home *** CD-ROM | disk | FTP | other *** search
/ Aminet 25 / Aminet 25 (1998)(GTI - Schatztruhe)[!][Jun 1998].iso / Aminet / comm / net / LT_UNIX255.lha / Shell / pgt.sh < prev    next >
Text File  |  1997-04-16  |  363b  |  25 lines
  1. # Lista um arquivo em modo LACED
  2. # By: Cristian Robert Gallas, LITHIUN SOFTWARE
  3.  
  4. p=""
  5. attribl p
  6. if p==""
  7.    echo "Erro de sintaxe:"
  8.    echo "pgt [DEVICE][ARQ]"
  9.    ex p
  10.    reset attribl
  11.    exit
  12. fi
  13. if exist ${p}
  14.    laced
  15.    pg ${p}
  16.    hires
  17.    ex p
  18.    reset attribl
  19.    exit
  20. else
  21.    echo "${p}: not found..."
  22.    ex p;reset attribl
  23.    exit
  24. fi
  25.